(rmail-variables): Compare truename as well as given name

against rmail-file-name.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index a40351c359cec50d79a7d5296fedf23a29607695..5bffa4ef60d5d61b8a336891c124c72bb02e51d1 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -545,7 +545,8 @@ Instead, these commands are available:
   (setq rmail-inbox-list (rmail-parse-file-inboxes))
   ;; Provide default set of inboxes for primary mail file ~/RMAIL.
   (and (null rmail-inbox-list)
-       (equal buffer-file-name (expand-file-name rmail-file-name))
+       (or (equal buffer-file-name (expand-file-name rmail-file-name))
+          (equal buffer-file-truename (file-truename rmail-file-name)))
        (setq rmail-inbox-list
             (or rmail-primary-inbox-list
                 (list (or (getenv "MAIL")